home *** CD-ROM | disk | FTP | other *** search
/ United Public Domain Gold 2 / United Public Domain Gold 2.iso / music_utilities / pt141.dms / pt141.adf / ArexxExamples.lha / EP_AddUserPrg.dopus < prev    next >
Text File  |  1993-10-05  |  316b  |  19 lines
  1. /* EaglePlayer - Lade angegebenes Userprogram rein */
  2.  
  3. parse arg userprgname
  4.  
  5. address 'rexx_EP'
  6.  
  7. options results
  8.  
  9. adduserprg userprgname
  10.  
  11. if result == "no" then do
  12.     address 'DOPUS.1'
  13.     toptext 'Eagleplayer: Userprogram not loaded !'
  14. end
  15. else do
  16.     address 'DOPUS.1'
  17.     toptext 'Eagleplayer: New Userprogram loaded !'
  18. end
  19.